;;;; This file defines functions for dealing with errors.
;;;; Copyright (C) 2009 David J. Rosenbaum, email: davidjrosenbaum@comcast.net
;;;;
;;;; This program is free software: you can redistribute it and/or modify
;;;; it under the terms of the GNU General Public License as published by
;;;; the Free Software Foundation, under version 3 of the License.
;;;;
;;;; This program is distributed in the hope that it will be useful,
;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;;; GNU General Public License for more details.
;;;;
;;;; You should have received a copy of the GNU General Public License
;;;; along with this program.  If not, see <http://www.gnu.org/licenses/>.
;;;;
;;;; Copyright (C) 2009 David J. Rosenbaum
;;;; This program comes with ABSOLUTELY NO WARRANTY; for details see COPYING.
;;;; This is free software, and you are welcome to redistribute it
;;;; under certain conditions; for details see COPYING.

(in-package :evpl)

(define-condition evpl-error (error)
  ()
  (:documentation "The base class for all EVPL errors."))

(define-condition evpl-warning (warning)
  ()
  (:documentation "The base class for all EVPL warnings."))

(define-condition unknown-character-warning (evpl-warning)
  ((character :initarg :character :reader :character))
  (:documentation "This condition indicates that an unexpected character was found.  character is the character found."))
